home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ WinXP Explorer 2.xpl < prev    next >
Text File  |  2003-09-04  |  2KB  |  56 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 6.0"
  2. "TYPE"="6"
  3. "COUNT"="2"
  4. "UIPATH 1"="Appearance\Explorer\Settings"
  5. "NAME"="File Sorting Algorithm"
  6. "LANGUAGE"="VBScript"
  7. "TEXT 1"="Activate new file sorting algorithm (Current User)"
  8. "TEXT 2"="Activate new file sorting algorithm (All Users)"
  9. "DESCRIPTION 1"="All Windows versions before Windows XP used a binary sorting algorithm for sorting files. This resulted in a file listing like "File 1.doc, File 10.doc, File 2.doc". As you can see, files with decimal parts are not sorted as you would expect it, "1,2,10", but instead binary. That way, "10" comes before "2"."
  10. "DESCRIPTION 2"="Since Windows XP, Windows uses a new character-based sorting algorithm that respects the logical order of filenames, so "10" comes AFTER "2". For example, the above noted example will list "File 1.doc, File 2.doc, File 10.doc" with XP."
  11. "DESCRIPTION 3"="However, if you do not wish to use this new sorting algorithm, you may turn off here."
  12. "DESCRIPTION 4"="You may activated or deactivate this setting either for you only or globally for all users on this PC by using either the "Current User" or "All Users" setting. If both types are set, All Users will apply."
  13. "VERSION"="1.06"
  14. "AUTHOR"="Xteq Systems (CptSiskoX)"
  15. "COPYRIGHT"="Copyright 2003 ⌐ Xteq Systems - All Rights Reserved"
  16. "CONTACTURL"="http://www.xteq.com/"
  17. "OSVERSION"="0000011"
  18. "COMMENT 1"="See: http://www.pcmag.com/article2/0,4149,1226705,00.asp"
  19.  
  20.  
  21. sP_SYS="HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoStrCmpLogical" 'DW
  22. sP_USR="HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoStrCmpLogical" 'DW
  23.  
  24. SUB Plugin_Initialize
  25.  i=RegReadValue(sP_USR)
  26.  if i<>1 then
  27.     Call SetUIElement(1,true)
  28.  end if
  29.  
  30.  i=RegReadValue(sP_SYS)
  31.  if i<>1 then
  32.     Call SetUIElement(2,true)
  33.  end if
  34. END SUB
  35.  
  36. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  37.  i=GetUIElement(1)
  38.  if i=true then
  39.     If RegValueExists(sP_USR) then Call RegDeleteValue(sP_USR)
  40.  else
  41.    Call RegWriteValue(sP_USR,1,2)
  42.  end if
  43.  
  44.  i=GetUIElement(2)
  45.  if i=true then
  46.     If RegValueExists(sP_SYS) then Call RegDeleteValue(sP_SYS)
  47.  else
  48.    Call RegWriteValue(sP_SYS,1,2)
  49.  end if
  50.  
  51.  
  52.  Call Restart()
  53. END SUB
  54.  
  55. SUB Plugin_Terminate
  56. END SUB